Tweak previous vc-bzr change

diff --git a/lisp/vc/vc-bzr.el b/lisp/vc/vc-bzr.el
index 0c1e07d44ccc46f239200468fa7bb5364faf129f..58e1c27c226f1396edc3a77ac818500d70d66f31 100644 (file)
--- a/lisp/vc/vc-bzr.el
+++ b/lisp/vc/vc-bzr.el
@@ -93,8 +93,7 @@ If nil, use the value of `vc-diff-switches'.  If t, use no switches."
   (ignore-errors
     (with-temp-buffer
       (call-process vc-bzr-program nil t nil "help" "status")
-      (goto-char (point-min))
-      (if (search-forward "--no-classify")
+      (if (search-backward "--no-classify" nil t)
           "--no-classify")))
   "String or list of strings specifying switches for bzr status under VC.
 The option \"--no-classify\" should be present if your bzr supports it."